home *** CD-ROM | disk | FTP | other *** search
/ Run Magazine ReRun 1987 May & June / rerun-1987-05-06.d64 / handy window 64 (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  4KB  |  71 lines
  1. 10 print"[147]handy-window by ian adam"
  2. 20 print"insert work disk, then press shift key"
  3. 30 wait653,3
  4. 40 open2,8,2,".handy64,p,w"
  5. 50 fori=1to1132:reada:x=x+a
  6. 60 print#2,chr$(a);:next:close2
  7. 70 ifx<>122646thenprint"data error: file no good":stop
  8. 80 print"use handy loader 64 to load '.handy64'
  9. 90 [131] 0,192,120,169,79,141,20,3,169,192,141,21,3,88,162,51,189,27,192
  10. 100 [131] 32,210,255,202,16,247,141,102,196,96,13,76,82,84,67,45,84,70,73
  11. 110 [131] 72,83,32,83,83,69,82,80,13,13,54,56,57,49,32,77,65,68,65,32,78
  12. 120 [131] 65,73,32,89,66,13,52,54,32,87,79,68,78,73,87,45,73,68,78,65,72
  13. 130 [131] 13,173,13,220,41,4,10,45,74,196,240,22,141,101,196,141,15,212
  14. 140 [131] 169,240,141,20,212,169,33,141,18,212,173,33,208,141,107,196,173
  15. 150 [131] 101,196,240,21,165,162,41,8,141,33,208,141,24,212,162,4,189,144
  16. 160 [131] 195,157,68,4,202,16,247,173,104,196,240,95,162,1,173,11,220,168
  17. 170 [131] 16,2,162,16,142,37,4,162,32,41,16,240,2,162,49,142,26,4,32,138
  18. 180 [131] 195,141,27,4,173,10,220,32,130,195,142,29,4,141,30,4,173,9,220
  19. 190 [131] 32,130,195,142,32,4,141,33,4,173,8,220,9,48,141,35,4,169,32,141
  20. 200 [131] 36,4,141,25,4,169,58,141,28,4,141,31,4,169,46,141,34,4,169,13
  21. 210 [131] 141,38,4,170,157,25,216,202,208,250,173,102,196,10,240,6,206
  22. 220 [131] 102,196,76,49,234,173,141,2,201,5,208,246,32,136,193,173,102
  23. 230 [131] 196,73,160,141,102,196,48,15,120,32,32,195,174,106,196,154,104
  24. 240 [131] 141,24,208,76,49,234,173,24,208,72,186,142,106,196,32,220,194
  25. 250 [131] 32,204,255,32,80,195,88,32,228,255,240,251,32,159,193,76,43,193
  26. 260 [131] 173,33,208,72,173,134,2,141,33,208,169,147,133,143,32,210,255
  27. 270 [131] 104,141,33,208,32,73,195,173,103,196,240,7,162,4,160,184,32,251
  28. 280 [131] 194,32,207,255,201,13,208,249,32,210,255,76,94,193,152,160,16
  29. 290 [131] 141,105,196,169,32,141,198,195,141,214,195,169,87,153,198,195
  30. 300 [131] 96,169,6,168,141,74,196,140,75,196,173,101,196,240,17,169,0,141
  31. 310 [131] 101,196,141,24,212,141,18,212,173,107,196,141,33,208,96,160,0
  32. 320 [131] 201,65,240,149,201,66,240,197,201,67,240,190,201,68,240,107,201
  33. 330 [131] 69,240,122,201,70,240,198,140,104,196,201,71,240,7,160,184,201
  34. 340 [131] 72,240,3,96,160,176,162,4,32,251,194,169,47,162,4,32,186,255
  35. 350 [131] 169,0,32,189,255,32,192,255,162,47,32,201,255,169,4,133,252,169
  36. 360 [131] 0,133,251,162,25,160,0,169,13,32,210,255,202,48,30,177,251,41
  37. 370 [131] 127,201,32,16,2,9,64,32,210,255,200,192,40,208,238,24,152,101
  38. 380 [131] 251,133,251,144,220,230,252,176,216,169,47,32,195,255,76,204
  39. 390 [131] 255,162,0,160,26,24,32,240,255,169,0,141,104,196,162,26,160,4
  40. 400 [131] 208,20,169,14,160,32,32,130,193,162,11,136,24,32,240,255,169
  41. 410 [131] 128,162,215,160,5,72,141,15,220,134,251,132,252,10,133,207,32
  42. 420 [131] 207,255,201,13,208,249,160,0,177,251,106,200,177,251,41,15,144
  43. 430 [131] 2,9,16,170,160,6,104,72,48,2,160,11,138,56,233,18,48,7,208,12
  44. 440 [131] 104,72,73,146,170,177,251,105,240,138,144,2,73,128,141,11,220
  45. 450 [131] 192,6,208,27,162,1,168,16,2,162,16,142,82,196,162,32,41,16,240
  46. 460 [131] 2,162,49,142,76,196,32,138,195,141,77,196,160,4,32,196,194,168
  47. 470 [131] 233,96,16,251,140,10,220,104,240,14,152,32,131,195,142,79,196
  48. 480 [131] 141,80,196,169,0,240,17,160,7,177,251,41,15,133,253,136,177,251
  49. 490 [131] 10,10,10,10,5,253,141,9,220,162,1,142,8,220,96,160,0,132,198
  50. 500 [131] 185,0,0,153,108,196,136,208,247,132,143,169,21,141,24,208,162
  51. 510 [131] 180,160,216,32,251,194,162,176,160,4,165,1,72,41,254,133,1,134
  52. 520 [131] 254,132,252,160,0,132,251,132,253,162,4,177,251,145,253,136,208
  53. 530 [131] 249,230,252,230,254,202,208,242,104,133,1,96,165,143,240,14,141
  54. 540 [131] 103,196,165,206,164,211,145,209,162,184,32,249,194,160,176,162
  55. 550 [131] 4,32,251,194,160,180,162,216,32,251,194,185,108,196,153,0,0,136
  56. 560 [131] 208,247,173,105,196,141,104,196,96,169,248,133,253,133,251,169
  57. 570 [131] 5,133,252,169,217,133,254,162,208,160,15,169,13,145,253,189,148
  58. 580 [131] 195,145,251,202,240,222,136,16,241,56,165,251,233,40,133,251
  59. 590 [131] 133,253,176,228,198,252,198,254,144,222,168,74,74,74,74,9,48
  60. 600 [131] 170,152,41,15,9,48,96,1,12,1,18,13,66,32,32,32,32,32,32,32,32
  61. 610 [131] 32,32,32,32,32,32,66,107,67,67,67,67,67,67,67,67,67,67,67,67,67
  62. 620 [131] 67,115,66,32,1,32,13,5,13,15,32,16,1,4,32,32,32,66,66,32,2,32
  63. 630 [131] 19,8,15,23,32,3,12,15,3,11,32,66,66,87,3,32,8,9,4,5,32,3,12,15
  64. 640 [131] 3,11,32,66,66,32,4,32,19,5,20,32,32,3,12,15,3,11,32,66,66,32,5
  65. 650 [131] 32,19,5,20,32,32,1,12,1,18,13,32,66,66,32,6,32,14,15,32,32,32,1
  66. 660 [131] 12,1,18,13,32,66,66,32,7,32,16,18,9,14,20,32,19,3,18,14,32,66
  67. 670 [131] 66,32,8,32,16,18,9,14,20,32,13,5,13,15,32,66,107,67,67,67,67,67
  68. 680 [131] 67,67,67,67,67,67,67,67,67,115,66,1,12,32,15,6,6,32,49,58,48,48
  69. 690 [131] 32,1,13,66,74,67,67,67,67,67,67,67,67,67,67,67,67,67,67,75,0,0
  70. 700 [131] 0,0,0
  71.